home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software USA 4 #12
/
Software USA Volume 4.12.iso
/
pc
/
lifestyl
/
anyclock
/
run
/
aclock.exe
/
0
/
RCDATA
/
TFORM5
/
TFORM5.txt
< prev
Wrap
Text File
|
1998-09-17
|
5KB
|
271 lines
object Form5: TForm5
Left = 236
Top = 35
BorderStyle = bsToolWindow
Caption = 'AnyClock Face'
ClientHeight = 444
ClientWidth = 269
Color = 8388672
Font.Color = clBlack
Font.Height = -14
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
OnActivate = FormCreate
OnCreate = FormCreate
PixelsPerInch = 120
TextHeight = 16
object Label22: TLabel
Left = 4
Top = 345
Width = 67
Height = 16
Caption = 'Corner size'
Font.Color = clWhite
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 4
Top = 310
Width = 21
Height = 16
Caption = 'Left'
Font.Color = clWhite
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 100
Top = 310
Width = 25
Height = 16
Caption = 'Top'
Font.Color = clWhite
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 4
Top = 414
Width = 43
Height = 16
Caption = 'TWidth'
Font.Color = clWhite
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 142
Top = 414
Width = 48
Height = 16
Caption = 'THeight'
Font.Color = clWhite
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object DriveComboBox1: TDriveComboBox
Left = 5
Top = 10
Width = 257
Height = 22
DirList = DirectoryListBox1
TabOrder = 0
OnChange = DriveComboBox1Change
end
object DirectoryListBox1: TDirectoryListBox
Left = 5
Top = 39
Width = 257
Height = 74
FileList = FileListBox1
ItemHeight = 16
TabOrder = 1
OnChange = DirectoryListBox1Change
OnDblClick = DirectoryListBox1DblClick
end
object FileListBox1: TFileListBox
Left = 5
Top = 121
Width = 257
Height = 80
ItemHeight = 16
Mask = '*.bmp;*.jpg;*.jpeg'
TabOrder = 2
OnDblClick = FileListBox1DblClick
end
object RadioGroup1: TRadioGroup
Left = 5
Top = 207
Width = 100
Height = 70
Caption = 'Clock Shape'
Font.Color = clLime
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
Items.Strings = (
'Round'
'Square'
'Both')
ParentFont = False
TabOrder = 3
OnClick = RadioGroup1Click
end
object SpinEdit32: TSpinEdit
Left = 73
Top = 345
Width = 66
Height = 26
MaxValue = 0
MinValue = 0
TabOrder = 9
Value = 99999
OnChange = SpinEdit32Change
end
object CheckBox1: TCheckBox
Left = 167
Top = 345
Width = 100
Height = 21
Caption = 'Hide taskbar'
Font.Color = clLime
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 10
OnClick = CheckBox1Click
end
object RadioGroup2: TRadioGroup
Left = 140
Top = 207
Width = 125
Height = 70
Caption = 'Window Position'
Font.Color = clLime
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
Items.Strings = (
'Top'
'None'
'Bottom')
ParentFont = False
TabOrder = 4
OnClick = RadioGroup2Click
end
object CheckBox2: TCheckBox
Left = 182
Top = 285
Width = 80
Height = 21
Caption = 'Moveable'
Font.Color = clLime
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = CheckBox2Click
end
object SpinEdit1: TSpinEdit
Left = 32
Top = 310
Width = 58
Height = 26
MaxValue = 9999
MinValue = 8
TabOrder = 7
Value = 9999
OnChange = SpinEdit1Change
end
object SpinEdit2: TSpinEdit
Left = 126
Top = 310
Width = 58
Height = 26
MaxValue = 9999
MinValue = 8
TabOrder = 8
Value = 9999
OnChange = SpinEdit2Change
end
object Button1: TButton
Left = 5
Top = 386
Width = 223
Height = 21
Caption = 'Steal Wallpaper Background'
TabOrder = 11
OnClick = Button1Click
end
object CheckBox3: TCheckBox
Left = 236
Top = 385
Width = 21
Height = 22
Font.Color = clLime
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 12
OnClick = CheckBox3Click
end
object SpinEdit3: TSpinEdit
Left = 52
Top = 409
Width = 58
Height = 26
MaxValue = 9999
MinValue = 8
TabOrder = 13
Value = 9999
OnChange = SpinEdit3Change
end
object SpinEdit4: TSpinEdit
Left = 194
Top = 409
Width = 58
Height = 26
MaxValue = 9999
MinValue = 8
TabOrder = 14
Value = 9999
OnChange = SpinEdit4Change
end
object Panel1: TPanel
Left = 0
Top = 377
Width = 270
Height = 2
TabOrder = 15
end
object CheckBox4: TCheckBox
Left = 7
Top = 285
Width = 170
Height = 21
Caption = 'Ignore Screen Boundary'
Font.Color = clLime
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = CheckBox4Click
end
end